perm filename ELISP.INI[BMP,SYS] blob
sn#737823 filedate 1984-01-10 generic text, type C, neo UTF8
COMMENT ā VALID 00002 PAGES
C REC PAGE DESCRIPTION
C00001 00001
C00002 00002 allocation for lseus
C00003 ENDMK
Cā;
; allocation for lseus
(COMMENT)
(PUTPROP (QUOTE MAKE-THM) (QUOTE ( MAKE-THM FASL)) (QUOTE AUTOLOAD))
(SETQ BASE 10. IBASE 10.)
; emaclsp crap
(progn (close infile)(inpush -1)
(help)
(fasload demon fas dsk (mac lsp))
(fasload file fas dsk (aid lsp))
(and si:ecalledp
(progn (fasload emaclsp fas dsk (mac lsp))
(fasload eaid fas dsk (mac lsp))))
(APPLY 'CRUNIT (LIST 'DSK (STATUS UDIR)))
(PRINT 'ELISP-BM)
T)